Dämpfungskonstante

Amplitude

Phasenverschiebung

Kreisfrquenz ω_o=2f_o t der ungedämpften Schwingung

δ =ω_o D

y(t)=A e^{-δ t} sin (ω t +φ)

Die gedämpfte Schwingung

Elongation

Zeit t in s

ω=\sqrt{ω_o^2 - D^2}

Regler Zeit animieren!

D = 0.1 (slider from 0 to 1, step 0.1)
A = 5 (slider from 1 to 5, step 0.1)
ω_o = 1 (slider from 0.1 to 5, step 0.1)
φ = 90 (slider from 0 to 360, step 1)
ω: (ω_o^(2) - D^(2))^(1 / 2)
δ: (ω_o * D)
h(t) = ((A * ℯ^(((-δ) * t))) * sin((ω * t) + (φ * π / 180)))
f(x) = If[0 ≤ x ≤ 30, h(x)]
t = 0 (slider from 0 to 30, step 0.01)
C = Point({t, f(t)})
B = Point({0, f(t)})
a = Line((t, 0), (t, f(t)))